تبادل
لینک هوشمند
تاريخ : یک شنبه 24 بهمن 1391برچسب:دستور #Open براي ويرايش و بازكردن فابل هاي متني در ويوال بيسيك, | 11:0 قبل از ظهر | نویسنده :
دستور نوشتن فايل*******'
Open "C:\Sample.TXT" For OutPut As #1
Print #1,"Amir"
Close #1
دستور بازكردن فايل*******'
Open "C:\Sample.Txt" For Input As #1
(Do While Not Eof(1
Input #1,A
List1.AddItem A
Loop
Close #1
نظرات شما عزیزان:
.: Weblog Themes By Pichak :.